home *** CD-ROM | disk | FTP | other *** search
/ Love & Sex - Muroi / Love & Sex - Muroi.iso / muroi / deta / dir_file / l02_q2.dir / 00113.ls < prev    next >
Encoding:
Text File  |  1995-08-26  |  4.0 KB  |  171 lines
  1. on exitFrame
  2.   global glist
  3.   repeat with i = 3 to 17
  4.     puppetSprite(i, 1)
  5.   end repeat
  6.   showa()
  7.   showb()
  8.   showc()
  9.   showd()
  10.   showe()
  11. end
  12.  
  13. on showa
  14.   set the castNum of sprite 3 to the number of cast "KEY"
  15.   puppetTransition(23)
  16.   updateStage()
  17.   puppetSound("KeyIs")
  18.   updateStage()
  19.   set the castNum of sprite 8 to the number of cast "KEY+"
  20.   puppetTransition(23)
  21.   updateStage()
  22.   repeat while soundBusy(1)
  23.     nothing()
  24.   end repeat
  25.   puppetSound("SelectIs")
  26.   updateStage()
  27.   set the castNum of sprite 13 to the number of cast ("A" & getAt(glist, 1))
  28.   puppetTransition(23)
  29.   updateStage()
  30.   repeat while soundBusy(1)
  31.     nothing()
  32.   end repeat
  33.   puppetSound("42")
  34.   updateStage()
  35.   set the castNum of sprite 3 to the number of cast "Key++"
  36.   set the castNum of sprite 8 to the number of cast ("AT" & getAt(glist, 1))
  37.   puppetTransition(23)
  38.   updateStage()
  39.   repeat while soundBusy(1)
  40.     nothing()
  41.   end repeat
  42. end
  43.  
  44. on showb
  45.   set the castNum of sprite 4 to the number of cast "RIVER"
  46.   puppetTransition(23)
  47.   updateStage()
  48.   puppetSound("RiverIs")
  49.   updateStage()
  50.   set the castNum of sprite 9 to the number of cast "RIVER+"
  51.   puppetTransition(23)
  52.   updateStage()
  53.   repeat while soundBusy(1)
  54.     nothing()
  55.   end repeat
  56.   puppetSound("SelectIs")
  57.   updateStage()
  58.   set the castNum of sprite 14 to the number of cast ("B" & getAt(glist, 2))
  59.   puppetTransition(23)
  60.   updateStage()
  61.   repeat while soundBusy(1)
  62.     nothing()
  63.   end repeat
  64.   puppetSound("42")
  65.   updateStage()
  66.   set the castNum of sprite 4 to the number of cast "River++"
  67.   set the castNum of sprite 9 to the number of cast ("BT" & getAt(glist, 2))
  68.   puppetTransition(23)
  69.   updateStage()
  70.   repeat while soundBusy(1)
  71.     nothing()
  72.   end repeat
  73. end
  74.  
  75. on showc
  76.   set the castNum of sprite 5 to the number of cast "Chair"
  77.   puppetTransition(23)
  78.   updateStage()
  79.   puppetSound("ChairIs")
  80.   updateStage()
  81.   set the castNum of sprite 10 to the number of cast "Chair+"
  82.   puppetTransition(23)
  83.   updateStage()
  84.   repeat while soundBusy(1)
  85.     nothing()
  86.   end repeat
  87.   puppetSound("SelectIs")
  88.   updateStage()
  89.   set the castNum of sprite 15 to the number of cast ("C" & getAt(glist, 3))
  90.   puppetTransition(23)
  91.   updateStage()
  92.   repeat while soundBusy(1)
  93.     nothing()
  94.   end repeat
  95.   puppetSound("42")
  96.   updateStage()
  97.   set the castNum of sprite 5 to the number of cast "Chair++"
  98.   set the castNum of sprite 10 to the number of cast ("CT" & getAt(glist, 3))
  99.   puppetTransition(23)
  100.   updateStage()
  101.   repeat while soundBusy(1)
  102.     nothing()
  103.   end repeat
  104. end
  105.  
  106. on showd
  107.   set the castNum of sprite 6 to the number of cast "Candle"
  108.   puppetTransition(23)
  109.   updateStage()
  110.   puppetSound("CandleIs")
  111.   updateStage()
  112.   set the castNum of sprite 11 to the number of cast "Candle+"
  113.   puppetTransition(23)
  114.   updateStage()
  115.   repeat while soundBusy(1)
  116.     nothing()
  117.   end repeat
  118.   puppetSound("SelectIs")
  119.   updateStage()
  120.   set the castNum of sprite 16 to the number of cast ("D" & getAt(glist, 4))
  121.   puppetTransition(23)
  122.   updateStage()
  123.   repeat while soundBusy(1)
  124.     nothing()
  125.   end repeat
  126.   puppetSound("42")
  127.   updateStage()
  128.   set the castNum of sprite 6 to the number of cast "Candle++"
  129.   set the castNum of sprite 11 to the number of cast ("DT" & getAt(glist, 4))
  130.   puppetTransition(23)
  131.   updateStage()
  132.   repeat while soundBusy(1)
  133.     nothing()
  134.   end repeat
  135. end
  136.  
  137. on showe
  138.   set the castNum of sprite 7 to the number of cast "DOOR"
  139.   puppetTransition(23)
  140.   updateStage()
  141.   puppetSound("DoorIs")
  142.   updateStage()
  143.   set the castNum of sprite 12 to the number of cast "DOOR+"
  144.   puppetTransition(23)
  145.   updateStage()
  146.   repeat while soundBusy(1)
  147.     nothing()
  148.   end repeat
  149.   puppetSound("SelectIs")
  150.   updateStage()
  151.   set the castNum of sprite 17 to the number of cast ("E" & getAt(glist, 5))
  152.   puppetTransition(23)
  153.   updateStage()
  154.   repeat while soundBusy(1)
  155.     nothing()
  156.   end repeat
  157.   puppetSound("42")
  158.   updateStage()
  159.   set the castNum of sprite 7 to the number of cast "DOOR++"
  160.   set the castNum of sprite 12 to the number of cast ("ET" & getAt(glist, 5))
  161.   puppetTransition(23)
  162.   updateStage()
  163. end
  164.  
  165. on mywait x
  166.   startTimer()
  167.   repeat while the timer < x
  168.     nothing()
  169.   end repeat
  170. end
  171.